// 由res2go自动生成。
// 在这里写你的事件。

package task

import (
    "github.com/ying32/govcl/vcl"
    "github.com/ying32/govcl/vcl/rtl"
    "runtime"
)

//::private::
type TForm1Fields struct {
}



func (f *TForm1) OnFormCreate(sender vcl.IObject) {
    vcl.Application.SetTitle("爬取工具")
    f.Button2.SetCaption("开始任务")
    icon := vcl.NewIcon()
    if runtime.GOOS == "windows" {
       icon.LoadFromResourceName(rtl.MainInstance(), "IDI_ICON1")
       f.SetIcon(icon) //图标由 rsrc 生成
    }
     go CheckUpdate()
    //f.SetPosition(types.PoScreenCenter)
}


func (f *TForm1) OnBtnClick1(sender vcl.IObject) {

}


func (f *TForm1) OnButton1Click(sender vcl.IObject) {

}


func (f *TForm1) OnComboBox1Change(sender vcl.IObject) {

}

func (f *TForm1) OnButton2Click(sender vcl.IObject) {
    title:=f.Button2.Caption()
    if title == "开始任务"{

        go Run()

    }else{
        Stop()
        //f.Button2.SetCaption("开始任务")
    }
   //f.Button2.SetCaption("正在爬取")

}


func (f *TForm1) OnCheckBox1Change(sender vcl.IObject) {

}

